Public Class Check_In
    Public strFirstname As String
    Dim strFullName As String
    Public strLastName As String
    Public strPatientId As String
    Public blnFound As Boolean
    Public btnSearch As String

    Property Check() As String
        Get
            Return strFullName = strFirstname + " " + strLastName
        End Get
        Set(ByVal value As String)
            strFullName = value
        End Set
    End Property

End Class
